slickR::slickR( list.files("images/Finals",full.names = TRUE,pattern = 'jpg'), height = 500, width = 1500) + slickR::settings(autoplay = TRUE, autoplaySpeed = 8000)